\begin{tikzpicture}
    \pgfmathsetmacro{\R}{1.5}
    \pgfmathsetmacro{\n}{6} % 6 边形
    \pgfmathsetmacro{\halfn}{int(\n/2)} % 边数的一半。用于减少绘制时的重复动作。

    \tkzDefPoints{0/0/O}
    \tkzDefPoint(0:\R){A}
    \tkzDefRegPolygon[center,sides=\n,name=P](O,A)
    \tkzDrawPolygon(P1,P...,P\n)

    \tkzDefLine[mediator](P1,P2)   \tkzGetPoints{a}{b}
    \tkzDefLine[mediator](P3,P4)  \tkzGetPoints{c}{d}
    \tkzInterLL(a,b)(c,d)  \tkzGetPoint{O}
    \foreach \i in {1,...,\halfn} {
        \pgfmathsetmacro{\s}{int(\i + 1)}
        \tkzDefMidPoint(P\i,{P\s})  \tkzGetPoint{X}
        \tkzDrawLine[add=0.2  and 1.2](P\i,O)
        \tkzDrawLine[add=0.25 and 1.25](X,O)
    }
    \tkzLabelPoints[above, xshift=-.5em](O)
\end{tikzpicture}

% \begin{tikzpicture}
%     \tkzDefPoints{0/0/A, 1.6/0/B}
%     \tkzDefRegPolygon[side,sides=6,name=P](A,B)
%     \tkzDrawPolygon(P1,P...,P6)

%     \tkzDefLine[mediator](P1,P2)   \tkzGetPoints{a}{b}
%     \tkzDefLine[mediator](P3,P4)  \tkzGetPoints{c}{d}
%     \tkzInterLL(a,b)(c,d)  \tkzGetPoint{O}
%     \foreach \i in {1,...,3} {
%         \pgfmathsetmacro{\s}{int(\i + 1)}
%         \tkzDefMidPoint(P\i,{P\s})  \tkzGetPoint{X}
%         \tkzDrawLine[add=0.2  and 1.2](P\i,O)
%         \tkzDrawLine[add=0.25 and 1.25](X,O)
%     }
%     \tkzLabelPoints[above, xshift=-.5em](O)
% \end{tikzpicture}

